home *** CD-ROM | disk | FTP | other *** search
/ Workplace Effectiveness:…ecision-Making Strategies / Workplace Effectiveness: Decision-Making Strategies.iso / pc / Files / Myself.dxr / 00001_Startup.ls next >
Encoding:
Text File  |  1998-12-16  |  561 b   |  20 lines
  1. global gMasterData, gNotesList
  2.  
  3. on prepareMovie
  4.   setUserArea(gMasterData, #myself)
  5.   set the keyDownScript to "quitCatcher"
  6.   if voidp(gNotesList) then
  7.     set gNotesList to [#means: EMPTY, #CD: EMPTY]
  8.   end if
  9.   cursor(0)
  10. end
  11.  
  12. on initFields
  13.   set vEmptyList to ["note field 1", "note field 2", "note field 3", "note field 4", "note field 5", "note field 6", "note field 7", "note field 8"]
  14.   repeat with X in vEmptyList
  15.     set the text of member X to " "
  16.     set the textFont of member X to "Palatino"
  17.     set the textSize of member X to 14
  18.   end repeat
  19. end
  20.